' Note that the value is the opposite of what you might
' expect because Y coordinates increase downward.
Private Function GetAngle(ByVal Ax As Single, ByVal Ay As Single, ByVal Bx As Single, ByVal By As Single, ByVal CX As Single, ByVal CY As Single) As Single